AnnualChange <- function(Matrix){ N <- nrow(Matrix) Matrix[2:N, 1:(N-1)] 2:N %>% map_dbl(~Matrix[.x, .x-1]) }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.